unit PushAppUser;

interface
//  uses classes.ECA_PeiXun;
type
  TPushAppUser = class
  private
    FMsg: String;
    Favatar: String;
    FISGC: Integer;
    Fnickname: String;
    FUserPass: String;
    FID: String;
    Fdevice_token: String;
    FUserFID: String;
    FIsAdmin: Integer;
    FUserName: String;
    procedure Setavatar(const Value: String);
    procedure Setdevice_token(const Value: String);
    procedure SetID(const Value: String);
    procedure SetIsAdmin(const Value: Integer);
    procedure SetISGC(const Value: Integer);
    procedure Setnickname(const Value: String);
    procedure SetUserFID(const Value: String);
    procedure SetUserName(const Value: String);
    procedure SetUserPass(const Value: String);
  public
    constructor Create; virtual;

    property ID: String read FID write SetID;
    property UserName: String read FUserName write SetUserName;
    property UserPass: String read FUserPass write SetUserPass;
    property UserFID: String read FUserFID write SetUserFID;
    property device_token: String read Fdevice_token write Setdevice_token;
    property nickname: String read Fnickname write Setnickname;
    property avatar: String read Favatar write Setavatar;
    property ISGC: Integer read FISGC write SetISGC;
    property IsAdmin: Integer read FIsAdmin write SetIsAdmin;

end;
implementation

{ TPerson }

constructor TPushAppUser.Create;
begin
  inherited Create;
end;

procedure TPushAppUser.Setavatar(const Value: String);
begin
  Favatar := Value;
end;

procedure TPushAppUser.Setdevice_token(const Value: String);
begin
  Fdevice_token := Value;
end;

procedure TPushAppUser.SetID(const Value: String);
begin
  FID := Value;
end;

procedure TPushAppUser.SetIsAdmin(const Value: Integer);
begin
  FIsAdmin := Value;
end;

procedure TPushAppUser.SetISGC(const Value: Integer);
begin
  FISGC := Value;
end;

procedure TPushAppUser.Setnickname(const Value: String);
begin
  Fnickname := Value;
end;

procedure TPushAppUser.SetUserFID(const Value: String);
begin
  FUserFID := Value;
end;

procedure TPushAppUser.SetUserName(const Value: String);
begin
  FUserName := Value;
end;

procedure TPushAppUser.SetUserPass(const Value: String);
begin
  FUserPass := Value;
end;

end.
